home *** CD-ROM | disk | FTP | other *** search
/ MacFormat España 19 / macformat_19.iso / Rincón del lector / Reader's Contributions / HeadHunter™ / port.Dxr / 00007_rigt.ls < prev    next >
Encoding:
Text File  |  1996-07-24  |  419 b   |  16 lines
  1. on mouseDown
  2.   puppetSound("6snd")
  3.   set variable to the castNum of sprite the clickOn
  4.   set variable to variable + 4
  5.   set the castNum of sprite the clickOn to variable
  6.   updateStage()
  7.   repeat while the stillDown
  8.     set the castNum of sprite the clickOn to variable
  9.     updateStage()
  10.   end repeat
  11.   set variable to variable - 4
  12.   set the castNum of sprite the clickOn to variable
  13.   updateStage()
  14.   go(marker(1))
  15. end
  16.